home *** CD-ROM | disk | FTP | other *** search
/ EROS 2 / EROS 2.iso / mac / EROS vol.2 / EROS vol.DXR / 00106.ls < prev    next >
Encoding:
Text File  |  1995-12-20  |  486 b   |  17 lines
  1. on mouseUp
  2.   puppetSound(0)
  3.   set the cursor of sprite 7 to 4
  4.   go(marker(0) + 2)
  5.   set the movieRate of sprite 7 to 1
  6.   if the castNum of sprite 7 = the number of cast "ecouple" then
  7.     set the castNum of sprite 7 to the number of cast "scouple"
  8.     updateStage()
  9.     set the movieRate of sprite 7 to 1
  10.   else
  11.     set the castNum of sprite 7 to the castNum of sprite 7 + 1
  12.     updateStage()
  13.     set the movieRate of sprite 7 to 1
  14.   end if
  15.   set the cursor of sprite 7 to [50, 51]
  16. end
  17.